home *** CD-ROM | disk | FTP | other *** search
/ Sprite 1984 - 1993 / Sprite 1984 - 1993.iso / lib / perl / sys / fb.ph < prev    next >
Encoding:
Text File  |  1991-08-12  |  1.0 KB  |  34 lines

  1. if (!defined &_FBDEV) {
  2.     eval 'sub _FBDEV {1;}';
  3.     if (!defined &ASM) {
  4.     eval 'sub FB_ATTR_NDEVSPECIFIC {8;}';
  5.     eval 'sub FB_ATTR_NEMUTYPES {4;}';
  6.     eval 'sub FBVIDEO_OFF {0;}';
  7.     eval 'sub FBVIDEO_ON {1;}';
  8.     eval 'sub FBTYPE_SUN1BW {0;}';
  9.     eval 'sub FBTYPE_SUN1COLOR {1;}';
  10.     eval 'sub FBTYPE_SUN2BW {2;}';
  11.     eval 'sub FBTYPE_SUN2COLOR {3;}';
  12.     eval 'sub FBTYPE_SUN2GP {4;}';
  13.     eval 'sub FBTYPE_SUN5COLOR {5;}';
  14.     eval 'sub FBTYPE_SUN3COLOR {6;}';
  15.     eval 'sub FBTYPE_MEMCOLOR {7;}';
  16.     eval 'sub FBTYPE_SUN4COLOR {8;}';
  17.     eval 'sub FBTYPE_NOTSUN1 {9;}';
  18.     eval 'sub FBTYPE_NOTSUN2 {10;}';
  19.     eval 'sub FBTYPE_NOTSUN3 {11;}';
  20.     eval 'sub FBTYPE_SUNFAST_COLOR {12;}';
  21.     eval 'sub FBTYPE_SUNROP_COLOR {13;}';
  22.     eval 'sub FBTYPE_SUNFB_VIDEO {14;}';
  23.     eval 'sub FBTYPE_RESERVED5 {15;}';
  24.     eval 'sub FBTYPE_RESERVED4 {16;}';
  25.     eval 'sub FBTYPE_RESERVED3 {17;}';
  26.     eval 'sub FBTYPE_RESERVED2 {18;}';
  27.     eval 'sub FBTYPE_RESERVED1 {19;}';
  28.     eval 'sub FBTYPE_LASTPLUSONE {20;}';
  29.     eval 'sub FB_ATTR_AUTOINIT {1;}';
  30.     eval 'sub FB_ATTR_DEVSPECIFIC {2;}';
  31.     }
  32. }
  33. 1;
  34.